home *** CD-ROM | disk | FTP | other *** search
- object Form25: TForm25
- Left = 334
- Top = 121
- Width = 222
- Height = 434
- Caption = 'Blemish/Pixel'
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = True
- OnClose = FormClose
- OnDeactivate = FormDeactivate
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object Label2: TLabel
- Left = 20
- Top = 332
- Width = 46
- Height = 16
- Caption = 'Correct:'
- end
- object Label1: TLabel
- Left = 7
- Top = 0
- Width = 181
- Height = 16
- Caption = 'To visually select blemish, right'
- Font.Charset = ANSI_CHARSET
- Font.Color = clGreen
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object Label3: TLabel
- Left = 7
- Top = 20
- Width = 200
- Height = 16
- Caption = 'click on the image to zoom in first.'
- Font.Charset = ANSI_CHARSET
- Font.Color = clGreen
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object StringGrid1: TStringGrid
- Left = 10
- Top = 39
- Width = 184
- Height = 238
- ColCount = 3
- DefaultColWidth = 45
- DefaultRowHeight = 20
- FixedCols = 0
- RowCount = 10000
- TabOrder = 0
- OnDrawCell = StringGrid1DrawCell
- ColWidths = (
- 45
- 45
- 36)
- end
- object BitBtn1: TBitBtn
- Left = 103
- Top = 286
- Width = 93
- Height = 30
- Hint = 'Delete the row at the cursor'
- Caption = 'Delete Row'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = BitBtn1Click
- end
- object BitBtn2: TBitBtn
- Left = 10
- Top = 286
- Width = 92
- Height = 30
- Hint = 'Insert a blank row at the cursor'
- Caption = 'Insert Row'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = BitBtn2Click
- end
- object BitBtn3: TBitBtn
- Left = 58
- Top = 359
- Width = 91
- Height = 31
- Hint = 'Close this window and refresh changes'
- Caption = 'Refresh'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = BitBtn3Click
- Kind = bkOK
- end
- object ComboBox1: TComboBox
- Left = 69
- Top = 325
- Width = 129
- Height = 24
- Hint =
- 'Correction is applied as specified here. "Always" will always c' +
- 'orrect. "Only when bad" will correct the pixels only when the pi' +
- 'xel diverges considerably from its neighbors.'
- ItemHeight = 16
- Items.Strings = (
- 'Always'
- 'Only when bad')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- Text = 'Always'
- end
- end
-